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1.0  IDENTIFICATION 

1.1  Title 

Tracking  Data  Paper  Tape  Generation  Routine  (SRADTPE) 

Ident:  K12,  Mod.  02 

1. 2  Programmed 

February  1963,  P.  T.  Kastama,  System  Development  Corporation 
D.  Lee,  Lockheed  Missiles  and  Space  Company* 

1. 3  Documented 

March  1963,  P.  T.  Kastama,  System  Development  Corporation 
2.0  PURPOSE 

This  program  is  intended  to  provide  a  simulation  capability,  which 
will  produce  tracking  data  on  paper  tape  for  unaugmented  tracking  stations. 
This  data  is  intended  to  represent  the  actual^ data  generated  by  various  an¬ 
tennas  during  vehicle  pass-over  for  a  given  station,  vehicle,  and  revolution 
number.  The  antennas  for  which  data  will  be  produced  are:  VERLORT,  HM18, 
DOPPLER  (kOO  me),  SHIP  MODII  (AN/SPQ-2),  SHIP  TLM18,  and  SHIP  FMR  DOPPLER. 

3.0  USAGE 

3.1  Calling  Sequence 


L 

RTJ 

SRADTPE 

L+l 

NORMAL  RETURN 

L+2 

ZR0 

0 

ZR0 

Vehicle  Number 

L+3 

ZR0 

0 

ZR0 

Delta  T 

*Part  of  the  program  "PREDICT"  waa  extracted  to  complete  the  paper  tape  output 
-from  SRADTPE. 
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( 


L+4  Antenna  Name. .. .Left  justified,  with  trailing 

blanks. 

20., 

L+5  ZB0 

ZR0 

L+6  ZR0 

ZB0 

L+7  ZR0 

ZR0 

L+8  ZR0 

ZR0 

3. 2  Operating  Procedures 

SRADTFE  may  he  called  upon  in  two  different  ways.  One  way  utilizes 
the  standard  COP  function  card,  while  the  second  method  is  to  use  the  SIPSA 
system  and  control  deck.  Both  card  formats  are  described  in  Section  3*7. 

3.3  Input  Parameters 

Several  input  parameters,  in  addition  to  a  Reset  Tape,  are  necessary 
to  generate  tracking  data.  These  parameters  are  defined  as  follows: 

a.  Vehicle  Number 

This  number  can  be  any  number.  However,  it  must  compare  with  the 
vehicle  number  on  the  Reset  Tape. 

b.  Time  Increment 

The  data  punched  on  paper  tape  are  usually  spaced  at  four-second 
intervals  (excluding  the  Doppler  antennas,  whose  data  are  spaced 
at  two-second  intervals).  However,  if  a  different  time  increment 
is  desired,  the  user  has  an  option  to  specify  a  value. 

c.  Antenna  Name 

Antenna  type  must  be  specified  in  order  that  the  appropriate  for¬ 
mat  and  output  can  be  simulated. 


20 

0 

Revolution  Number 
0 

Reset  Tape  Unit  Number 
0 

Station  Number 
0 

Print  Option  ( 1-Print ) 
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d.  Revolution  Number 

This  number  specifies  the  particular  revolution  for  which  data  is 
desired. 

e.  Reset  Tape  Unit  Number 

This  number  indicates  which  tape  unit  should  be  read  for  the 
Reset  Tape. 

f.  Station  Number 

This  number  must  define  any  legal  unaugmented  station  for  which 
the  station  coordinates  are  available  in  the  Reference  Pool. 

g.  Off-Line  Data  Printout  Option 

The  program  will  provide  an  optional  off-line  listable  BCD  dump 
for  every  point  generated.  The  off-line  data  dump  consists  of 

•  •  l 

TAU  (Machine  time);  System  time;  the  X,Y,Z,X,Y,Z  inertial  vector; 
local  antenna  position;  and  the  polar  elements.  The  data  will  be 
on  Tape  3  in  BCD  listable  format,  ThiB  off-line  data  printout 
option  is  provided  to  minimize  1604  computer  run  time. 

3. 4  On-Line  Messages  and  Printouts 

a.  PLEASE  READY  PAPER  TAPE  PUNCH  FOR  5  IEVEL  TAPE.  I  WILL 
REQUIRE  APPROXIMATELY  XXX  FEET  OF  UNUSED  PAPER  TAPE  TO 
COMPLETE  THE  RUN.  WHEN  PUNCH  IS  READY  PRESS  START  TO 
CONTINUE. 

This  printout  indicates  to  the  operator  that  paper  tape  is  about  to 
be  punched.  XXX  is  a  decimal  number  computed  by  the  program  as  a  function 
of  duration  to  indicate  about  how  much  paper  tape  will  be  needed. 

b.  ALL  TRACKING  DATA  HAS  BEEN  PUNCHED  ON  PAPER  TAPE.  PRESS 
START  TO  RETURN  TO  CONTROL  PROGRAM. 
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When  all  data  for  each  function  request  card  has  been  punched  on  a 
paper  tape,  the  above  on-line  printout  will  be  provided. 

3.5  Error  Printouts 

a.  NO  ANTENNA  OR  WRONG  ANTENNA  SPECIFIED.  CORRECT  FUNCTION 
CARD  AND  PRESS  START  TO  RETURN  TO  CONTROL  PROGRAM. 

Illegal  antenna  name  on  function  card.  Correct  card,  load  deck  in 
reader,  and  press  start  to  return  to  control  program,  which  will  re-read  the 
deck. 

b.  STATION  OR  REV  NUMBER  NOT  IN  ACQUISITION  TABLE.  CORRECT 
FUNCTION  CARD  AND  PRESS  START  TO  RETURN  TO  CONTROL  PROGRAM. 

Information  in  Acquisition  Table  is  not  available  for  given  revolu¬ 
tion  and  station  numbers.  Correct  the  function  card,  load  deck  in  reader, 
and  press  start  to  return  to  control  program  to  re-read  the  deck. 

c.  LATITUDE  AND  LONGITUDE  ARE  NOT  AVAILABIE  FOR  THIS 
STATION.  PRESS  START  TO  RETURN  TO  CONTROL  PROGRAM. 

Change  function  card  to  request  data  for  a  different  station  or  insert 
latitude,  longitude,  and  height  in  the  particular  station  cells  in  SLAT,  SLONG, 
and  SH  in  the  Reference  Pool. 

3.6  Tape  Assignments 

Tape  1  must  contain  the  l6o4  Augmentation  System  Utility  Master. 

Tape  3  will  contain  a  listable  BCD  dump  of  every  data  point  upon 
completion  of  SRADTPE,  if  requested. 

The  Reset  Tape  may  be  placed  on  Tape  Unit  2,  or  4-12,  as  long  as  the 
unit  number  is  specified  on  the  function  card. 


3.7 


Control  Card  Formats 


15  March  1963 


-  5  - 


IM-(L)-73V°37/00 


3.7*1  The  Tracking  Data  Paper  Tape  Punch  Request  Card  (PUNCH). 


PUNCH  P1  P2  P3  ?k  P5  Pg  PT  \ 


Columns 

Content 

Meaning 

1-8 

PUNCH 

Name  of  request,  left  Justified  with  trailing 

blanks. 

9-13 

P1 

Vehicle  number,  right  Justified  (decimal  integer 
<  99999). 

15-16 

P2 

At  in  seconds  (blank  if  not  required),  right 
Justified  (decimal  integer  <  99  seconds). 

18-21 

P3 

Antenna  name  in  BCD,  left  justified  with  trailing 

blanks. 

Choices  are: 

VELT  (Verlort) 

TL18  (TIM18) 

DQPR  (Doppler) 

ANQ2  (AN/SPQ-2) 

SHIP  (Ship  TLM18) 

SPMR  (Ship  PMR  Doppler) 

23-26 

P4 

Revolution  number,  right  justified  (decimal 
integer  <  9999). 

28-29 

P5 

Reset  Tape  Unit  number,  right  justified,  unit»2, 

4-12. 

31-32 

P6 

Station  number,  right  justified  (must  be  unaug¬ 
mented  station  number). 

34 

P7 

List  option.  If  P^*l,  data  will  be  written  on 
Logical  Tape  Unit  3  to  be  listed  after  the  run  is 

complete. 
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In  addition  to  the  PUNCH  card,  certain  system  control  cards  are 
necessary  to  operate  SRADTPE  with  the  SIPSA  system.  (See  Operating  Instruc¬ 
tions,  Milestone  7,  TM-(L)-734/022/00). 

3.7*2  The  MTCII  Function  Request  Card  Format 


*N  SRADTPE 


Pl  P2  P3  P4  P5  P6  P7 


where : 

*  Identifies  the  card  as  a  function  request,  and  must  be  in 
Column  1. 

N  is  an  optional  decimal  integer  specifying  a  logical  equipment 

unit  on  which  a  storage  analysis  is  to  be  output. 

P1,P2,P3,P4,P5,P6,P7  are  same  inPu^  parameters  described  in 

Section  3*7«1»  From  these  parameters,  MTCII  generates  the 
calling  sequence  described  in  Section  3*1* 

3.8  Jump  Key  Settings 

There  is  one  jump  key  setting  involved  in  the  operation  of  SRADTPE. 
If  it  is  desired  to  use  an  old  format  (pre -augmentation)  Reset  Tape,  it  is 
necessary  to  set  Jump  Key  3  on  the  l6o4  console.  If  a  new  format  (augmenta¬ 
tion)  Reset  Tape  is  used,  no  jump  key  settings  are  necessary. 

3.9  Output  Data  Formats 

See  SIPSA  Operating  Instructions,  Milestone  7,  lM-(L)-734/ 022/00  for 
Paper  Tape  formats  and  a  sample  output  listing. 

4.0  METHOD 
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4.1  Tracking  Data  Generation 

The  method  employed  to  generate  tracking  data  is  to  utilize  the  infor¬ 
mation  from  a  Reset  Tape  (which  contains  a  filled  Breakwell  Matrix  and  a 

filled  Station  Acquisition  Table)  to  calculate  the  rise  and  set  vectors  (T,X, 

•  •  • 

Y,Z,X,Y,Z),  and  duration  of  a  pass  over  a  tracking  station  by  the  Breakwell 
Closed-Form  Equations.  Then,  using  the  rise  vector  as  the  initial  condition, 
the  Satellite  inertial  position  at  a  specified  time  increment  (At)  can  be  cal¬ 
culated  by  the  Runge-Kutta  advance  integration  method.  By  converting  these 
inertial  positions  into  the  appropriate  station  local  polar  coordinates,  the 
result  can  be  formatted,  and  scaled  to  represent  various  antennas,  and  used  as 
input  data  for  checkout  of  operational  tracking  programs.  In  addition,  System 
Time  will  be  calculated  and  updated  from  the  initial  condition.  Polar  coordi¬ 
nates  for  the  antennas  consist  of  azimuth,  elevation,  and  slant  range.  During 
conversion,  an  inverse-refraction  correction  is  added  onto  the  elevation  for 
all  antennas.  (See  Appendix  A  for  a  flow  diagram  of  SRADTPE. ) 

4.2  Angular  Noise  Error 

In  order  to  produce  meaningful  simulated  tracking  data,  antenna  noise 
error  is  added  to  all  the  simulated  data.  The  method  employed  is  to  define 
the  maximum  elevation  error  as^el.  Then  a  random  number  N  is  generated  ranging 
from  -1  to  +1.  Thus  the  elevation  error  at  any  time,  t^  is  <£el  N^.  The 
maximum  azimuth  error  is  defined  as  <£az/cos  (elevation).  For  simulation  pur¬ 
poses,  <Cel  and  ^az  are  set  equal  to  0.003  radians. 

5-0  RESTRICTIONS 

5. 1  Hardware  Components 

A  1604  Computer,  card  reader,  paper  tape  punch,  printer,  and  three 
tape  units  are  required. 


f 
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5.2  Subroutines  Required 


ATAN1 

FIX 

OUTPUT 

SIMRESET 

COS 

FLOAT 

PTR 

SIN 

COTRANS 

FLQATBIN 

RTP 

SUBERR 

SDTFEQ 

MACGUT 

SACQTIME 

TAN 

DIGITS 

OUTERR 

SETUP 

TTE 

j  Items  Set 

and/or  Used 

AMPM 

GAMMA 

OMEGA 

TAU 

AZM 

HRS 

RA 

VEL 

CLOCK 

JAE2 

RAD 

X 

COMMON 

LAT 

REV 

XD 

DAY 

LONG 

SBCD 

Y 

DT 

MIN 

SEC 

YD 

FORCE 

MONTH 

SNO 

Z 

FORMAT 

MU 

ST 

ZD 

5.4  Other  Restrictions 

5.4.1  A  Reset  Tape  must  be  specified  and  provided. 

5.4.2  Jump  Key  3  must  be  set  if  the  Reset  Tape  is  of  pre -augmentation  format. 

5.4.3  Data  punched  is  for  unaugmented  stations  only.  A  paper  tape  for  the 
augmented  Indian  Ocean  Station  vill  be  punched  in  SRGR.  (See  TM-(l)-734/023/0O, 
Milestone  11,  for  SRGR. ) 

6.0  TIMING 

The  operating  time  for  SRADTPE  is  variable.  The  amount  of  time  depends 
on  the  amount  and  type  of  data  and  duration  of  a  pass.  If  an  off-line  listable 
output  is  requested,  more  time  is  required.  For  the  teat  vehicle,  an  average  run 
took  10  to  15  minutes  not  including  set  up  time. 
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7. 0  STORAGE  REQUIREMENTS 


Decimal 

Octal 

Main  Program 

833 

1501 

Tables  and  Constants 

168 

250 

Total  Storage  Requirement 

1001 

1751 

8.0  VALIDATION  TEST 

Since  most  of  the  subroutines  used  by  SRADTPE  are  routines  written  by 
LMSC  and  have  either  been  previously  validated  or  operationally  proven,  mathe¬ 
matical  validation  of  the  tracking  data  is  unnecessary.  The  validation  tests 
on  SRADTPE  have  been  oriented  mainly  towards  the  reasonableness  of  the  output. 

8.1  Description  of  Input  Parameters 

The  validation  test  of  SRADTPE  has  been  divided  into  two  parts.  The 
first  part  involved  the  request  of  tracking  data  from  all  radar  antennas  from 
many  tracking  stations.  The  data  generated  was  then  examined  for  reasonableness 
and  output  format.  The  second  part  involved  the  generation  of  radar  data  for 
a  few  revolutions  and  selectively  comparing  the  output  results  against  the 
ephemeris  (for  the  identical  revolutions)  generated  by  the  function  "EPHFUN", 
using  the  same  Reset  Tape. 

8.1.1  First  Part 

Severed,  runs  were  made  for  all  types  of  antenna  data.  Data  was  punched 
on  paper  tapes  for  antennas  TIM18,  DOPPLER,  AN/SPQ-2,  SHIP-TIM18,  VEHLOHT,  and 
the  SHIP-PMR-DOPPLER.  The  data  punched  on  paper  tapes  was  then  read  in  through 
the  paper  tape  reader  by  the  PT  program.  The  output  of  the  PT  program  was  a 
readable  printout  of  the  paper  tape,  which  was  later  examined  for  reasonableness 
and  format. 

8.1.2  Second  Part 

{■ 

Using  the  identical  Reset  Tape,  the  "EPHFUN"  function  was  used  to 
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generate  an  ephemeris,  using  the  Breakvell  Closed-Fonn  method,  for  the  same 
revolution.  Then  the  result  was  compared,  selectively,  against  the  data  gene¬ 
rated  by  SRADTPE  for  accuracy. 

8.1.3  Hardware  Configuration  Control 

a.  Input  Control  Cards:  Card  Reader 

b.  Augmentation  System  Utility  Master  Tape:  Tape  Unit  No.  1 

c.  Scratch  Tape  (Utility  and  Simulation):  Tape  Unit  No.  3 

d.  Reset  Tape  (Simulation):  Tape  Unit  5 

8.1.4  Input  Control  Cards 

The  following  control  cards  were  used  for  the  validation  tests: 

a.  *SIPSA  (SIPSA  system  calling  card) 

b.  START  (initialization  request  card) 

c.  PUNCH  (Radar  tracking  data  request  card) 

(See  Appendix  B  for  a  listing  of  validation  deck. ) 

8. 1. 5  Running  Procedure 

a.  Input  Control  Cards  placed  in  the  card  reader. 

b.  Tape  Units  1,  3>  5  ready. 

c.  Read  cards  in  and  execute. 

8.2  Expected  Output  from  Test 

a.  On-line  printout  indicating  all  cards  were  read  in. 

b.  Off-line  BCD  listing  of  every  point  generated. 

c.  On-line  printout  to  indicate  paper  tape  should  be  ready. 
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d.  On-line  printout  to  indicate  data  for  one  pass  has  been  punched 
on  paper  tape. 

e.  Data  from  the  paper  tape  printout  should  match  very  closely  with 
the  data  from  the  "EPHFUN"  function. 

9.0  REFERENCES 

9.1  1M-(l)-734/015/00,  Computer  Program  Design  Specifications  for  the 
Simulation  of  the  Augmented  SCF  Environment  at  the  STA  and  CPDC  (Milestone  4), 
System  Development  Corporation,  20  November  1962. 

9.2  IM-(l) -73V022/00,  Computer  Operating  Instructions  for  the  Simulated 
Input  Preparation  System  for  the  Augmented  SCF  Environment  at  the  STA  and 
CPDC  (SIPSA),  Milestone  7,  System  Development  Corporation,  1  February  1963. 

9. 3  IMSD- 447578,  l6o4  System  Manual,  Lockheed  Missiles  and  Space  Company. 
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SRADTPE 


Save  Tau 
and 

Index  Registers 


_ ± _ 

Extract  Vehicle 
Number  from 
Calling  Sequence 


- * _ 

Extract  Delta  T 
from 

Calling  Sequence 


_ * _ 

Extract  Antenna 
Name 
From 

Calling  Sequence 


Extract  ReV. 
Humber  from 
Calling  Sequence 


jL 


Extract  Reset 
Tape  Unit  Humber 


_ * _ 

Extract  Station 
from 

Calling  Sequence 
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initialize  ST 
and  Earth 
Constants 
\  SETUP  J 


Convert  to 
Inertial 
Rectangular 
.  PTR  / 


Augmentation 
Format  Reset 
Tape 


/  Check  A 
'  Ref.  Pool  for 
Station  Coord. 
\  STCHK  / 


Search 

Acquisition  Table 
for  Revolution 
&  Station  Number 


and  Duration.  Set 
fTau  to  Rise-Time. 


/  Determine 
Rise  Vector  an 
!ise,Mid,Set  Tim 
s,  SACQTIME 


Compute 
Mid-Time  and 
Set -Time 


Clear  Stores  for 
Azimuth,  Elevation 
and  Slant  Range 


/Check  Ref. 

Pool  for 
Station  Coord. 
\  STCHK 


Integrate  to 
Nearest  Multiple 
4  sec  for 


Determine 
Rise  Vector 
TTE 


/  Convert  In-\ 
'ertial  Rect.  tov 
Local  Rect.  Co  -j 
^ordinates  SIMCTIR 
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Convert  Iner- 
ftl&l  Polar  to  Lo\ 
jal  Rectangular^ 
Eoord. SIMCTIF 


Convert  Local 
Rect.  to  Local 
Polar  Coord. 
SIMCTRP 


Update  \ 
Time  Counters  / 
MACGUT  / 


All  Data 
Points  Punched 


Punch  End  of 
Tape 
(Stop  Codes) 
PUTSTOP 

~JT 

Print  On-Line 
"No  More 
Tracking  Data" 


Tau  + 

T  greater 
Set -Time 


Yes 


No 


<D 


Restore  ST,  TAU 
and  Index 
Registers 


m 
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PUM0D2 

(Verlort) 


Save  Index  Reg. 
1  and  2 


Fur.oh  Data 
Start  Code 
(FUDSTART) 


Compute  Time 
Relative  to 
A.M.  or  P.M. 


Punch  Time 
(FU.M16) 


Compute 
COS  (EL) 
(COS) 


Generate  a 
Random  Number 
(N) 

(SRANDOM) 


0 


— 

f- 
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